home *** CD-ROM | disk | FTP | other *** search
/ Cinema Studio: Frank Herrmann / Cinema Studio - Frank Herrmann.iso / tools / dust / examples / waves3dpreview.bat < prev    next >
DOS Batch File  |  1995-06-16  |  435b  |  25 lines
  1. !clear
  2. ;this script creates <frames> pictures of a spherical 3D-wave
  3. ;the cube should have a resolution of 10x10x10 points (or more)
  4. ;DustV1.83+ required
  5.  
  6. .frames=60
  7.  
  8. set(screen,t)
  9. set(screendepth,5)
  10. set(drawmode,color)
  11. set(windowpri,1)
  12. avail
  13. load(1,cube)
  14. color(1,255,0,0)
  15. avail
  16. copy(1,3)
  17. avail
  18. window(3,0,0,300,color,21,306,0.8,true,false)
  19. avail
  20. set(checkmouse,f)
  21. for(i,1,frames)
  22.  wave3dframe(1,frames,i,3,s)
  23.  windowsave(1,pic.%)
  24. end
  25.